
rd /s /Q out
md out

for /f  %%a in  ('hostname') do set my_host_name=%%a
for /f "tokens=1,2,3 delims=/- " %%a in ("%date%") do @set D=%%a%%b%%c
for /f "tokens=1,2,3 delims=:." %%a in ("%time%") do @set T=%%a%%b%%c
set T=%T: =0%
rar a DbsFiles_%D%_%T%_%my_host_name:~0,3%.rar DbsFiles

if exist D:\Project move *.rar D:\Project
move *.rar ..\

